10 PRINT"[147][158] HAPPY NEW YEAR FROM PCC 2!":POKE2040,13:DIMM(39),N(39) 15 P=832:Q=1:R=255:S=54296:V=53248 20 FORJ=0TO38:READK,L:M(J)=K:N(J)=L:NEXT:FORJ=0TO4:READK,L:POKEV+K,L:NEXT 25 POKEV,R-255*RND(0):Z=100*RND(0)+50 30 POKEV+39,Q:POKEP+18,16:FORY=230TOZSTEP-1:POKEV+1,Y:NEXT:POKES,15:POKES,0 35 POKE53281,1:FORJ=1TO3:NEXT:POKE53281,0:FORJ=0TO38:POKEP+M(J),N(J):NEXT 40 FORK=0TO300:NEXT:Q=Q+1:IFQ=8THENQ=1 45 FORJ=0TO38:POKEP+M(J),0:POKEV+1,PEEK(V+1)+1:FORK=0TO50:NEXT:NEXT 50 POKES,5:POKES,0:GOTO25 55 DATA019,040,016,017,022,016,013,130 56 DATA025,131,010,041,028,040,015,007 57 DATA017,192,007,108,006,030,008,240 58 DATA004,068,009,097,011,012,012,128 59 DATA014,002,001,131,000,003,002,128 60 DATA018,056,020,056,021,064,023,004 61 DATA024,129,026,002,027,006,029,192 62 DATA031,068,034,068,030,008,032,032 63 DATA037,198,033,016,035,016,040,130 64 DATA036,016,038,016,043,130,033,000 65 DATA021,001,032,000,023,001,029,001